function KKB.Panel_Cleanup(Panel)
	Panel_Cleanup = Panel
	Panel_Cleanup:SetSize(100, 400)
	Panel_Cleanup:Clear(true)
	Panel_Cleanup.contents = vgui.Create("DListLayout")
	Panel_Cleanup.contents:Clear()
		
	local DisconnectedButton = vgui.Create( "DButton" )
	DisconnectedButton:SetText( "Remove All Disconnected Players Things >.<" )
	DisconnectedButton.DoClick = function( button )
		net.Start( "KKB_Cleanup_Disconnected" )
		net.SendToServer()
	end
	Panel_Cleanup:AddPanel(DisconnectedButton)
	
	local ActivePlayers = vgui.Create( "DListView" )
	ActivePlayers:AddColumn( "UniqueID" )
	ActivePlayers:AddColumn( "Nick" )
	ActivePlayers:SetTall( 150 )
	ActivePlayers:SetMultiSelect( true )
	function KKB.Cleanup_Reload_ActivePlayers()
		ActivePlayers:Clear()
		for _,v in pairs(player.GetAll()) do
			ActivePlayers:AddLine(v:UniqueID(),v:Nick())
		end
	end
	KKB.Cleanup_Reload_ActivePlayers()
	Panel_Cleanup:AddPanel(ActivePlayers)
	
	local SelectedButton = vgui.Create( "DButton" )
	SelectedButton:SetText( "Remove All Selected Player(s) Things :O" )
	SelectedButton.DoClick = function( button )
		local SelectedLines = ActivePlayers:GetSelected()
		if ( #SelectedLines > 0 ) then
			local Players = {}
			for _,v in pairs(SelectedLines) do
				local UniqueID = v.Columns[1]:GetValue()
				table.insert(Players, UniqueID)
			end
			if ( #Players > 0 ) then
				net.Start( "KKB_Cleanup_Selected" )
				net.WriteTable( Players )
				net.SendToServer()
			end
		end
	end
	Panel_Cleanup:AddPanel(SelectedButton)
end